home *** CD-ROM | disk | FTP | other *** search
/ The Complete Work of Mahatma Gandhi / The Complete Work of Mahatma Gandhi-CD interactive.iso / mac / Ganmac / eb.cst / 00161_Script_volume 255 < prev    next >
Text File  |  1999-09-22  |  672b  |  26 lines
  1. on mouseDown
  2.   --  Vol 255
  3.   global gvolume, cspname
  4.   set wgrp to chars(cspname,1,1)
  5.   if gvolume < 255 then
  6.     if gvolume = 150 then
  7.       set the member of sprite 107 to the number of member (wgrp&"volm")
  8.     else
  9.       set the member of sprite 106 to the number of member (wgrp&"vol0")
  10.     end if
  11.     
  12.     set the member of sprite 108 to the number of member ("r"&wgrp&"voll")
  13.     set the soundLevel to 7
  14.     set the volume of sound 1 to 255
  15.     set the volume of sound 2 to 255
  16.     updateStage
  17.     if gvolume = 0 then
  18.       set the soundEnabled to true
  19.       updateStage
  20.     end if
  21.     
  22.     set gvolume to 255
  23.     
  24.   end if
  25.   updateStage
  26. end